10 REM  RAM BOOT
12 F$=CHR$(34)+"[210][193][205][160][211][212][193][210][212]"+CHR$(34)
15 GOTO45
20 PRINT"[147]":POKE53281,0
30 PRINTSPC(15)"[210][193][205][160][196][201][211][203]":RETURN
40 :
45 GOSUB20
50 PRINTSPC(8)"[215]RITTEN BY [202]EFF [202]OHNSON"
54 PRINTSPC(9)"[200]AGERSTOWN, [205][196]  21740"
56 :
60 PRINT" [201]F YOU'VE EVER BEEN FRUSTRATED BY THE"
65 PRINT"EXTREMELY SLOW SPEED OF YOUR 1541 DISK"
70 PRINT"DRIVE THEN [210][193][205] [196][201][211][203] IS FOR YOU."
75 GOSUB10000
80 GOSUB20
85 PRINT" [210][193][205][160][196][201][211][203] TAKES AWAY THE TEDIOUS DISK"
90 PRINT"WAITS.  [201]T ALLOWS YOU TO SAVE UP TO 32"
95 PRINT"[194][193][211][201][195] PROGRAMS IN MEMORY AT ONE TIME."
100 PRINT" [217]OU CAN [204][207][193][196], [211][193][214][197], AND [203][201][204][204] PROGRAMS"
110 PRINT"AS OFTEN AS YOU WOULD LIKE.  [217]OU CAN"
115 PRINT"EVEN LOOK AT THE [210][193][205] DISK'S CONTENTS"
120 PRINT"WHENEVER YOU NEED TO."
125 GOSUB10000
130 GOSUB20
140 PRINT" [207][203], NOW YOU WANT TO KNOW HOW TO USE"
145 PRINT"[210][193][205][160][196][201][211][203], RIGHT?"
150 PRINT" [215]ELL, TO USE [210][193][205][160][196][201][211][203][160]OUTSIDE OF THE"
155 PRINT"[204][207][193][196][211][212][193][210] ENVIRONMENT, ALL YOU NEED TO DO"
160 PRINT"IS THIS:"
165 PRINT"       1. [204][207][193][196]"F$",8
170 [153]"       2. (null)(null)(null)
175 PRINT"[210][193][205][160][196][201][211][203][160]IS NOW ACTIVE (DO NOT RE-LOAD"
180 PRINT"[210][193][205][160][196][201][211][203] BECAUSE YOU WILL LOSE ALL OF"
185 PRINT"FILES THAT YOU HAD PREVIOUSLY SAVED)."
190 GOSUB10000
200 :
300 GOTO20000
10000 REM    KEYPRESS
10010 PRINT""SPC(13)"<PRESS A KEY>";
10020 POKE198,0:WAIT198,1:WAIT197,64:RETURN
20000 REM   CONNECT AROUND
20010 PRINT"[147]"
20020 PRINT"      1. [204][207][193][196] [193][206][196] [210][213][206] [210][193][205][160][196][201][211][203]."
20030 PRINT"      2. [210][197][212][213][210][206][160][212][207][160][204][207][193][196][211][212][193][210]."
20040 PRINT"[215]HICH ?";
20050 POKE198,0:WAIT198,1:GETA$:IFA$<>"1"ANDA$<>"2"THENPOKE53280,RND(1)*15:GOTO20050
20055 PRINTA$
20060 IFA$="2"THENF$="HELLO":GOTO63000
20070 PRINT"    [193][210][197] [217][207][213][160][211][213][210][197]? [217][207][213][160][215][201][204][204][160][197][216][201][212][160][212][200][197] "
20072 PRINT"        [204][207][193][196][211][212][193][210][160][197][206][214][201][210][207][206][205][197][206][212]. "
20080 POKE198,0:WAIT198,1:GETA$:IFA$<>"Y"THEN20000
20090 PRINT"[207].[203]., HERE WE GO..."
20095 F$="RAM START"
63000 REM   CONNECT BACK TO LS
63010 PRINT"[144]LOAD"CHR$(34)F$CHR$(34)",8":PRINT"RUN"
63020 POKE631,13:POKE632,13:POKE198,2